procedure OemToCharBuff(var S: String);
Translates a string with characters from the OEM-defined character set into an ANSI string.